home *** CD-ROM | disk | FTP | other *** search
- object dlgNewProject: TdlgNewProject
- Left = 706
- Top = 231
- HelpContext = 501
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'New Slideshow Project Wizard'
- ClientHeight = 385
- ClientWidth = 416
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- ShowHint = True
- OnCreate = FormCreate
- OnShow = Formshow
- PixelsPerInch = 96
- TextHeight = 13
- object pgcNewProject: TPageControl
- Left = 0
- Top = 0
- Width = 416
- Height = 385
- ActivePage = tab3
- Align = alClient
- MultiLine = True
- Style = tsButtons
- TabOrder = 0
- OnChange = pgcNewProjectChange
- object tab1: TTabSheet
- Caption = 'tab1'
- ImageIndex = 4
- OnShow = tab1Show
- object Bevel7: TBevel
- Left = 8
- Top = 34
- Width = 393
- Height = 9
- Shape = bsTopLine
- end
- object Label6: TLabel
- Left = 16
- Top = 52
- Width = 369
- Height = 37
- AutoSize = False
- Caption =
- 'This wizard will guide you through the main steps in creating a ' +
- 'new slideshow from images and/or video files'
- WordWrap = True
- end
- object Bevel8: TBevel
- Left = 8
- Top = 314
- Width = 393
- Height = 9
- Shape = bsTopLine
- end
- object Label12: TLabel
- Left = 16
- Top = 107
- Width = 82
- Height = 13
- Caption = 'Slideshow Name:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label5: TLabel
- Left = 8
- Top = 4
- Width = 283
- Height = 24
- Caption = 'Create New Slideshow Project'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label7: TLabel
- Left = 16
- Top = 143
- Width = 72
- Height = 13
- Caption = 'Save to Folder:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object btnCancel1: TsitBitBtn
- Left = 230
- Top = 324
- Width = 83
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 5
- Images = frmMain.ImageList1
- ImageIndex = 1
- end
- object btnHelp1: TsitBitBtn
- Left = 318
- Top = 324
- Width = 83
- Height = 25
- Caption = 'Help'
- TabOrder = 6
- OnClick = btnhelpClick
- Images = frmMain.ImageList1
- ImageIndex = 2
- end
- object btnNext1: TsitBitBtn
- Left = 142
- Top = 324
- Width = 83
- Height = 25
- Caption = 'Next'
- Default = True
- TabOrder = 4
- OnClick = btnNext1Click
- Images = frmMain.ImageList1
- ImageIndex = 12
- end
- object edtSSName: TEdit
- Left = 105
- Top = 104
- Width = 281
- Height = 21
- Hint =
- 'Specify a name for your slideshow. It will be used as a filenam' +
- 'e and as the default text for title pages'
- TabOrder = 0
- Text = 'My Slideshow'
- end
- object edtSSFolder: TEdit
- Left = 105
- Top = 140
- Width = 281
- Height = 21
- Hint = 'This is the folder where the project file will be saved to'
- TabStop = False
- TabOrder = 1
- end
- object btnBrowseWork: TsitBitBtn
- Left = 306
- Top = 171
- Width = 80
- Height = 25
- Hint = 'Specify the folder to save your project to'
- Caption = 'Browse...'
- TabOrder = 2
- OnClick = btnBrowseWorkClick
- Images = frmMain.ImageList1
- ImageIndex = 8
- end
- object chkSkipWizard: TCheckBox
- Left = 24
- Top = 280
- Width = 353
- Height = 17
- Hint =
- 'If you wish to start editing the new project immediately (withou' +
- 't using this wizard) then check this option and click "OK"'
- Caption = 'Skip this Wizard. I will create the slideshow myself'
- TabOrder = 3
- OnClick = chkSkipWizardClick
- end
- end
- object tab2: TTabSheet
- Caption = 'tab2'
- object Bevel1: TBevel
- Left = 8
- Top = 314
- Width = 393
- Height = 9
- Shape = bsTopLine
- end
- object Label20: TLabel
- Left = 16
- Top = 52
- Width = 370
- Height = 13
- Caption =
- 'Please specify your source for the videos and/or images to add t' +
- 'o your project:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Bevel2: TBevel
- Left = 8
- Top = 34
- Width = 393
- Height = 9
- Shape = bsTopLine
- end
- object Label1: TLabel
- Left = 8
- Top = 4
- Width = 224
- Height = 24
- Caption = 'Add Images and Videos'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label3: TLabel
- Left = 48
- Top = 104
- Width = 337
- Height = 33
- AutoSize = False
- Caption =
- 'You will be prompted to select a folder from your computer and c' +
- 'hoose the images to add from it'
- WordWrap = True
- end
- object Label11: TLabel
- Left = 48
- Top = 176
- Width = 337
- Height = 33
- AutoSize = False
- Caption =
- 'DVD PixPlay will display all connected cameras and scanners and ' +
- 'allow you to retrieve the images from the device'
- WordWrap = True
- end
- object Label15: TLabel
- Left = 48
- Top = 248
- Width = 337
- Height = 33
- AutoSize = False
- Caption =
- 'You will need to add images and videos from the main DVD PixPlay' +
- ' interface'
- WordWrap = True
- end
- object btnHelp2: TsitBitBtn
- Left = 318
- Top = 324
- Width = 83
- Height = 25
- Caption = 'Help'
- TabOrder = 6
- OnClick = btnhelpClick
- Images = frmMain.ImageList1
- ImageIndex = 2
- end
- object btnNext2: TsitBitBtn
- Left = 142
- Top = 324
- Width = 83
- Height = 25
- Caption = 'Next'
- Default = True
- TabOrder = 4
- OnClick = btnNext2Click
- Images = frmMain.ImageList1
- ImageIndex = 12
- end
- object btnCancel2: TsitBitBtn
- Left = 230
- Top = 324
- Width = 83
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 5
- Images = frmMain.ImageList1
- ImageIndex = 1
- end
- object btnPrev2: TsitBitBtn
- Tag = -1
- Left = 54
- Top = 324
- Width = 83
- Height = 25
- Caption = 'Previous'
- TabOrder = 3
- OnClick = btnPrev2Click
- Images = frmMain.ImageList1
- ImageIndex = 11
- end
- object rdbImagesFromFolder: TRadioButton
- Left = 24
- Top = 80
- Width = 361
- Height = 17
- Caption = 'Retrieve images/videos from a folder on my computer'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- TabStop = True
- end
- object rdbImagesFromCamera: TRadioButton
- Left = 24
- Top = 152
- Width = 361
- Height = 17
- Caption = 'Retrieve images from a camera or scanner'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- end
- object rdbImagesFromNowhere: TRadioButton
- Left = 24
- Top = 224
- Width = 361
- Height = 17
- Caption = 'Do not add any files to my project at this time'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- end
- end
- object tab3: TTabSheet
- Caption = 'tab3'
- OnShow = tab3Show
- object Label21: TLabel
- Left = 8
- Top = 4
- Width = 289
- Height = 24
- Caption = 'Add More Images and Videos?'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Bevel3: TBevel
- Left = 8
- Top = 34
- Width = 393
- Height = 9
- Shape = bsTopLine
- end
- object lblFileCount: TLabel
- Left = 16
- Top = 52
- Width = 377
- Height = 21
- AutoSize = False
- Caption = 'Your project contains x images and y video files.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Bevel4: TBevel
- Left = 8
- Top = 314
- Width = 393
- Height = 9
- Shape = bsTopLine
- end
- object lblImageDisplayTimeH: TLabel
- Left = 16
- Top = 155
- Width = 276
- Height = 13
- Caption = 'How long should each of your image files be displayed for?'
- end
- object Label16: TLabel
- Left = 67
- Top = 79
- Width = 220
- Height = 13
- Caption = 'to add more images and videos to your project '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object lblImageDisplayTime: TLabel
- Left = 40
- Top = 186
- Width = 227
- Height = 13
- Caption = 'Default Image Display Time: (sec.)'
- end
- object lblFolderCount: TLabel
- Left = 40
- Top = 220
- Width = 121
- Height = 13
- Caption = 'Total Slideshow Duration:'
- end
- object lblSlideshowTime: TLabel
- Left = 180
- Top = 220
- Width = 81
- Height = 13
- Caption = 'lblSlideshowTime'
- end
- object btnPrev3: TsitBitBtn
- Tag = -1
- Left = 54
- Top = 324
- Width = 83
- Height = 25
- Caption = 'Previous'
- TabOrder = 2
- OnClick = PreviousClick
- Images = frmMain.ImageList1
- ImageIndex = 11
- end
- object btnNext3: TsitBitBtn
- Left = 142
- Top = 324
- Width = 83
- Height = 25
- Caption = 'Next'
- Default = True
- TabOrder = 3
- OnClick = btnNext3Click
- Images = frmMain.ImageList1
- ImageIndex = 12
- end
- object btnHelp3: TsitBitBtn
- Left = 318
- Top = 324
- Width = 83
- Height = 25
- Caption = 'Help'
- TabOrder = 5
- OnClick = btnhelpClick
- Images = frmMain.ImageList1
- ImageIndex = 2
- end
- object btnCancel3: TsitBitBtn
- Left = 230
- Top = 324
- Width = 83
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 4
- Images = frmMain.ImageList1
- ImageIndex = 1
- end
- object lnkMoreImages: TLinkLabel
- Left = 16
- Top = 79
- Width = 51
- Height = 17
- Cursor = crHandPoint
- Hint =
- 'Return to the previous step to add more images and/or videos to ' +
- 'the slideshow'
- Caption = 'Click here'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsUnderline]
- ParentFont = False
- TabOrder = 0
- OnClick = PreviousClick
- end
- object spnImageDisplayTime: TSpinEdit
- Left = 180
- Top = 182
- Width = 57
- Height = 22
- Hint =
- 'The number of seconds each image is displayed before flipping to' +
- ' the next one'
- MaxValue = 10000
- MinValue = 1
- TabOrder = 1
- Value = 5
- OnChange = spnImageDisplayTimeChange
- end
- end
- object tab4: TTabSheet
- Caption = 'tab4'
- object Bevel5: TBevel
- Left = 8
- Top = 34
- Width = 393
- Height = 9
- Shape = bsTopLine
- end
- object Bevel6: TBevel
- Left = 8
- Top = 314
- Width = 393
- Height = 9
- Shape = bsTopLine
- end
- object Label2: TLabel
- Left = 8
- Top = 4
- Width = 148
- Height = 24
- Caption = 'Slideshow Style'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object lblFolderHeading: TLabel
- Left = 16
- Top = 52
- Width = 281
- Height = 13
- Caption = 'Specify other settings to adjust the styling of your slideshow:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label4: TLabel
- Left = 24
- Top = 84
- Width = 77
- Height = 13
- Caption = 'Title Page Style:'
- end
- object btnPrev4: TsitBitBtn
- Tag = -1
- Left = 54
- Top = 324
- Width = 83
- Height = 25
- Caption = 'Previous'
- TabOrder = 7
- OnClick = PreviousClick
- Images = frmMain.ImageList1
- ImageIndex = 11
- end
- object btnNext4: TsitBitBtn
- Left = 142
- Top = 324
- Width = 83
- Height = 25
- Caption = 'Next'
- Default = True
- TabOrder = 8
- OnClick = btnNext4Click
- Images = frmMain.ImageList1
- ImageIndex = 12
- end
- object btnHelp4: TsitBitBtn
- Left = 318
- Top = 324
- Width = 83
- Height = 25
- Caption = 'Help'
- TabOrder = 10
- OnClick = btnhelpClick
- Images = frmMain.ImageList1
- ImageIndex = 2
- end
- object btnCancel4: TsitBitBtn
- Left = 230
- Top = 324
- Width = 83
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 9
- Images = frmMain.ImageList1
- ImageIndex = 1
- end
- object btnAddTitlePage: TsitBitBtn
- Left = 265
- Top = 182
- Width = 127
- Height = 27
- Hint = 'Edit the style of the title page that is added'
- Caption = 'Edit Title Page...'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = btnAddTitlePageClick
- Images = frmMain.ilstButtons16
- ImageIndex = 16
- end
- object chkTransitions: TCheckBox
- Left = 24
- Top = 232
- Width = 233
- Height = 17
- Hint =
- 'Transition effects enhance the styling of your slideshow by disp' +
- 'laying an effect as one image changes to the next'
- Caption = 'Display transition effects as images change'
- Checked = True
- State = cbChecked
- TabOrder = 3
- OnClick = chkTransitionsClick
- end
- object btnTransitions: TsitBitBtn
- Left = 265
- Top = 227
- Width = 127
- Height = 27
- Hint = 'Select the effects that can be used in this project'
- Caption = 'Select Transitions...'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- OnClick = btnTransitionsClick
- Images = frmMain.ilstButtons16
- ImageIndex = 45
- end
- object chkBackgroundMusic: TCheckBox
- Left = 24
- Top = 276
- Width = 233
- Height = 17
- Hint =
- 'Specifies that background music track will be added to the slide' +
- 'show, otherwise it will be silent'
- Caption = 'Play background music during slideshow'
- Checked = True
- State = cbChecked
- TabOrder = 5
- OnClick = chkBackgroundMusicClick
- end
- object btnBackgroundMusic: TsitBitBtn
- Left = 265
- Top = 271
- Width = 127
- Height = 27
- Hint =
- 'Select the sound files that will be played while the slideshow i' +
- 's displayed'
- Caption = 'Select Sound Files...'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 6
- OnClick = btnBackgroundMusicClick
- Images = frmMain.ilstButtons16
- ImageIndex = 25
- end
- object cmbTitlePage: TComboBox
- Left = 109
- Top = 80
- Width = 151
- Height = 21
- Hint =
- 'Inserts a page of the specified style at the start of the projec' +
- 't stating the name of the slideshow'
- Style = csDropDownList
- ItemHeight = 0
- TabOrder = 0
- OnChange = cmbTitlePageChange
- end
- object Panel1: TPanel
- Left = 117
- Top = 107
- Width = 135
- Height = 102
- BevelOuter = bvNone
- BorderWidth = 1
- Caption = 'Panel1'
- Color = cl3DDkShadow
- TabOrder = 1
- object iePreview: TImageEnView
- Left = 1
- Top = 1
- Width = 133
- Height = 100
- ParentCtl3D = False
- BorderStyle = bsNone
- ScrollBars = ssNone
- Align = alClient
- TabOrder = 0
- end
- end
- end
- object tab5: TTabSheet
- Caption = 'tab5'
- ImageIndex = 4
- OnShow = tab5Show
- object Bevel9: TBevel
- Left = 8
- Top = 314
- Width = 393
- Height = 9
- Shape = bsTopLine
- end
- object Bevel10: TBevel
- Left = 8
- Top = 34
- Width = 393
- Height = 9
- Shape = bsTopLine
- end
- object Label9: TLabel
- Left = 8
- Top = 4
- Width = 233
- Height = 24
- Caption = 'Your Slideshow is Ready'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label10: TLabel
- Left = 16
- Top = 52
- Width = 318
- Height = 13
- Caption = 'Your slideshow has been created. What would you like to do now?'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label13: TLabel
- Left = 48
- Top = 112
- Width = 337
- Height = 65
- AutoSize = False
- Caption =
- 'You will be returned to the main DVD PixPlay interface where you' +
- ' can re-order your images and choose custom display times and tr' +
- 'ansitions. You can burn your slideshow later by selecting "File' +
- '>Create Slideshow CD" from the main menu'
- WordWrap = True
- end
- object lblBurnSlideshow: TLabel
- Left = 48
- Top = 212
- Width = 337
- Height = 65
- AutoSize = False
- Caption =
- 'The Create CD wizard will be displayed so you can burn your slid' +
- 'eshow directly to disc'
- WordWrap = True
- end
- object btnPrev5: TsitBitBtn
- Tag = -1
- Left = 54
- Top = 324
- Width = 83
- Height = 25
- Caption = 'Previous'
- TabOrder = 2
- OnClick = btnPrev5Click
- Images = frmMain.ImageList1
- ImageIndex = 11
- end
- object btnFinish: TsitBitBtn
- Left = 142
- Top = 324
- Width = 83
- Height = 25
- Caption = 'Finish'
- Default = True
- TabOrder = 3
- OnClick = btnFinishClick
- Images = frmMain.ImageList1
- ImageIndex = 0
- end
- object btnCancel5: TsitBitBtn
- Left = 230
- Top = 324
- Width = 83
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 4
- Images = frmMain.ImageList1
- ImageIndex = 1
- end
- object btnHelp5: TsitBitBtn
- Left = 318
- Top = 324
- Width = 83
- Height = 25
- Caption = 'Help'
- TabOrder = 5
- OnClick = btnhelpClick
- Images = frmMain.ImageList1
- ImageIndex = 2
- end
- object rdbEditSlideshow: TRadioButton
- Left = 24
- Top = 88
- Width = 369
- Height = 17
- Caption = 'Edit the slideshow project further'
- Checked = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- TabStop = True
- end
- object rdbBurnSlideshow: TRadioButton
- Left = 24
- Top = 188
- Width = 361
- Height = 17
- Caption = 'Burn the slideshow project to disc'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- end
- end
- end
- object BrowseFolder1: TBrowseFolder
- Title = 'Folder for DVD PixPlay Files'
- Flags = [bfFileSysDirsOnly, bfStatusText]
- ShowPathInStatusArea = False
- SyncCustomButton = False
- Left = 380
- end
- end
-